home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 2 / Digital_Talk_02_1993-08-01_Digital_Talk_de_Side_A.d64 / trail menu (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  54 lines
  1. 1 poke808,252:poke56576,199:poke53272,21:poke53265,155:poke53270,200
  2. 45 poke53265,peek(53265)and239
  3. 50 poke53280, 5:poke53281,11:print"[147]";chr$(142);
  4. 55 print"[152]esttrailwesttrailwesttrailwestt"
  5. 60 print"ilwesttra[154]O[183][183][183][183][183][183][183][183][183][183][183][183][183]P[152]esttrailwe"
  6. 65 print"trailwes[144]t[146][154][180][153]trailwest[154][167][152]ilwesttrai"
  7. 70 print"westtrail[144] [146][154]L[175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]trailwest"
  8. 75 print"ailwestt[144]rail west trail[146][152]westtrailw"
  9. 80 print"ttrailwesttrailwesttrailwesttra"
  10. 85 print"westt[154]O[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]P[152]ailwest"
  11. 90 print"railw[144]e[146][154][180][167][152]ttrail"
  12. 95 print"sttra[144]i[146][154][180]1[155])[153]playgame[154][167][152]westtr"
  13. 100 print"[160]lwest[144] [146][154][180][167][152]railwes"
  14. 105 print"trail[144]w[146][154][180]2[155])[153]readinstructions[154][167][152]sttrail"
  15. 110 print"esttr[144]a[146][154][180][167][152]lwestt"
  16. 115 print"ilwes[144]t[146][154][180]3[155])[153]readfew[150]credits[154][167][152]trailwe"
  17. 120 print"trail[144] [146][154][180][167][152]esttrai"
  18. 125 print"westt[144]r[146][154]L[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]ilwest"
  19. 130 print"ailwe[144]st trail west trail wes[146][152]ttrailw"
  20. 135 print"ttrailwesttrailwesttrailwesttra"
  21. 140 print"westtrailwesttrailwesttrailwest"
  22. 145 print"railwe[154]O[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]P[152]ttrail"
  23. 150 print"sttra[144]i[146][154][180][153]pleaseenterchoice[154][170][152]westtr"
  24. 155 print"lwest[144] [146][154]L[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]railwes"
  25. 160 print"trail[144]west trail west trail w[146][152]esttrail"
  26. 165 print"esttrailwesttrailwesttrailwestt"
  27. 170 poke53265,peek(53265)or16
  28. 175 geta$:ifa$=""then175
  29. 180 ifa$="1"then215
  30. 185 ifa$="2"then220
  31. 190 ifa$="3"then200
  32. 195 goto 175
  33. 200 goto 1000
  34. 215 nf$="trail game":goto225
  35. 220 nf$="trail inst"
  36. 225 poke53280,5:poke53281,11
  37. 226 print"[147][208]lease wait while loading..."
  38. 230 print"[151]load"chr$(34)nf$chr$(34)",8,1"
  39. 235 print"run"
  40. 240 poke631,asc(""):poke632,13:poke633,13:poke198,3
  41. 245 end
  42. 1000 print"[147]"
  43. 1001 print"credits for this game must go to:"
  44. 1002 print"idea by dr.pepper and kinley"
  45. 1003 print"game coding: dr.pepper and kinley"
  46. 1004 print"titlescreen by dr.pepper"
  47. 1005 print"window magic improved by kinley"
  48. 1006 print"game tested by little john"
  49. 1007 print"few greetings from fresh[152] to:"
  50. 1008 print"tecmo * little john * dr.zoom"
  51. 1009 print"press space for menu..."
  52. 1200 geta$:ifa$=""then1200
  53. 1201 goto 50
  54.